RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFFRRRFFFRFR FRFRRRRRRRRRPRFFF 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFRFRRRFRRRFR FRRRRRRPRRPPR PPE 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFRRRFRRRRFRFR FPRRRRRRRRRR FFF 
RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 COO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN OOO OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRR = RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU NNN NNNNNN 000 FFF FFF 

RRR R UUU UUU NNN NNN 0O0G 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NN NNN 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NNN NNW 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU =~ NNN NNN 006000000 FFF FFF 


*eF ILE®*1De*SAVve 
SSSSSSSS$ AAAAAA VV VV EEEEEEEEEE 
SSSSSSSS AAAAAA VV VV EEEEEEEEEE 
SS AA AA VV VW EE 
SS AA AA VV VV EE 
SS AA AA VV VW EE 
SS AA AA VV VV EE 
SSSSSS Ab AA VV VV EEEEEEEE 
SSSSSS AA AA VV VV EEEEEEEE 
SS AAAAAAAAAA VV VV EE 
SS AAAAAAAAAA VV Vv €E 
ss AA BA VV VV EE eeee 
SS AA AA VW WV EE eeee 
SSSSSSSS AA AA Vv EEEEEEEEEE eoee 
SSSSSSSS AA AA VV EEEEEEEEEE eee 
RRRRRRRR EEEEEEEEEE QQQQQQ 
RRRRRRRR EEEEEEEEEE QQQQaQ 
RR RR EE Q QQ 
RR RR EE QQ QQ 
RR RR EE QQ QQ 
RR RR EE QQ QQ 
RRRRRRRR EEEEEEEE QQ QQ 
RRRRRRRR EEEEEEEE QQ QQ 
RR RR EE QQ QQ QQ 
RR RR EE QQ aa QQ 
RR RR EE QQ Q 
RR RR EE QQ QQ 
RR RR EEEEEEEEEE QQQQ QQ 
RR RR EEEEEEEEEE QQQQg QQ 
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{ 
Version: "v04-000' 


leeeereeeenenennnennentrennrenetenteneetnnntnnnnentnntenerenereeerreereetts 


& COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
't DIGITAL EQUIPMENT EORPORATION, MAYNARD. MASSACHUSETTS. 
i ALL RIGHTS RESERVED. 


* 

® 

® 

® 

: i 
ie THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPI * 
ie ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH T * 
ie INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY. OT : 
ie COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO A . 
ie OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HERE * 
ie TRANSFERRED. . 
*® 

te THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
® 

* 

* 

® 

* 

* 

* 

* 


Hid SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
:* CORPORATION. 


i DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
:* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


See E ERE EERE RARER EERE AAA 
' 


'e¢ 


| FACILITY: DSR (Digital Standard RUNOFF) / DSRPLUS 


! ABSTRACT: 
This require file defines part of the storage area for the .SAVE 
commands. Whole structures that will be saved will remain as they 
are; this Require file just defines the additional area for the 
single items. Items declared in the SAVE area do not also appear in 
ied 7 es area because the SAVEALL area includes all that is in 

e area. 


i ENVIRONMENT: Transportable BLISS 


i AUTHOR: Ken Alden 
i CREATION DATE: December 1982 
i MODIFIED BY: 
i 007 REMO0007 Ray Marshall _1=June-1984 
Completely reworked the definitions of SAVE_LENGTH & 
SAVEALL_LENGTH. t least one size was wrong and hard coded 


om pag were used - Re a XSIZE could have been used. Now 
ZSIZE is used for most of the items. Also, the XPD_ items 
are now conditionalized for DSRPLUS. 


006 KFA00006 Ken Alden 30-Sep-1983 
Moved the HCT items to the . SAVE list’ and three SCA items to 
the .SAVE ALL item block. 
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005 


004 


003 


KFA00005 Ken Alden 77-Jul-1983 
Added gca_flag_cmd to the save List. 


KFA00004 Ken Alden 5-Jul-1983 
Added SCA_FLAGS to the save List. 
KAD00003 Keith Dawson 07-Mar-1983 


Global edit of all modules. Updated module names, idents, 
copyright dates. Changed require files to BLISS (ibrary. 
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SFIELD SAVE_FIELDS = 
SET 


save$g_sca_cc_ok 
savesg_sca_ [ust ty 
save$g_sca_fill 
save$g_sca_crock 
save$g_sca_\|m 
save$g_sca_rm 
save$g_sca_spacing 


nnnnnnnnnnnnnnnnnnunn 
PPPAAPA AAA AA ARH A AHA MOM M WM 
De be tnt bed Pend oad Pend feat and bat bat td Ped bad band nd ne bd Bd Be 
MMMmMmMmmmMmmMmmmmmMmmmmrrnchirnecrnicry 
DDD DDDDDDADADADADABDADADADDDD 


Leth SL La ta 
esses ese eeeeeseesesesee se ees 


DAAAAAOAAIAAAIAAaAaMMAaonaa 


LITERAL 
save$k_length = SFIELD_SET_SIZE; 


MACRO 
$save_ block = 
BLOCK Csave$k_length) FIELD (save_fields) %; 


SFIELD saveall_fields = 
SET 


saveall$g_gca_autojust = CSINTEGER], 
saveall$g_gca_autopara = (CS$INTEGERJ, 
saveall$g_gca_autosubt = (SINTEGER), 
saveall$g_gca_autotabl = (SINTEGER), 
saveall$g_gca_case = CSINTEGERJ, 
saveall$g_gca_xcase = CSINTEGERJ, 
saveall$g_phan_header = (CS$INTEGER), 
saveall$g_phan_paging = (SINTEGER), 
saveall$g_sca_cc_ok = CSINTEGER), 
saveall$g_sca_bar_char = CSINTEGER], 
= CSINTEGER 


saveall$g_sca_peritod 
| Dts 


LITERAL 
saveall($k_length = SFIELD_SET_SIZE; 


MACRO 
$saveall procs = 
BLOCK Csaveall$k_length) FIELD (saveall_fields) 2%; 


as) = 
Nned_as)/ZUPVAL %; 
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LITERAL 


XIF DSRPLUS %THEN 


2FI 


: | Fount tog EBPVALs (or fullwords) since the size of this Literal 
j 


VALS. 
save_length = SxXWOS(fla ag table itn count]) ! The flag table. 
+ $XWDS (COUNTED List max, tabs3) ' The TAB table 
+ gxuds tatebie.. i The Action TABLE 
+ SXWDS(VECTOR™ a {F300} ! paragraph definition tables 
+ save$k_length, ! SAVE block 
save_length 


= cts count * 2) } Each aay B, uses tue fullwords 

+ abs+ ab us two control words 

+ CHEAL GeaT1onCatablen gh A bec ee on TABLE entry is one byte 
+ ees ! Baragreph definition tables 

+ XUBS (Ssave block), SAVE block 


saveall_length = save ctengtn ! Size of SAVE , Structure 
+ paveal $k_length ! | sAVEAL bloc 


+ TTIM 
+ Souda teenies: list Cmax levels]) ! for HLLIST 
+ (max_ecc * ecc$k_length) ! for ECC 


+4 ! for XPD sfLAGs 
+ Sxwds(fixed_string Cxp_ string_Size]) ! for XPD_APPEND 


%() «=6Alternate definitions: 


+ max_levels+2 ! for HLLIST 
+ (xp_ string. size/%UPVAL) +4 t for XPD_APPEND 


i 


zo rm 


tn 
_— 
s 


PMENT CORPORA 
AND PROPRIET 


ION 
RY 


0337 Fea Vso 


